home *** CD-ROM | disk | FTP | other *** search
/ Die Speccy' 97 / Die Speccy' 97.iso / amiga_system / the_aminet / comm / bbs / filelister146.lha / Rexx / Searchfiles.Trans < prev    next >
Text File  |  1994-09-13  |  367b  |  20 lines
  1. /* Searchfiles.trans */
  2.  
  3. options results
  4.  
  5. bbsidentify term
  6. bbsline=strip(word(result,4))
  7.  
  8. befehl="host=show('P','FILELISTER."||bbsline||"')"
  9. interpret befehl
  10.  
  11. if ~host then do
  12.   address command 'run BBS:bin/FileLister '||bbsline
  13.   address command 'waitforport FILELISTER'||bbsline
  14. end
  15.  
  16. befehl="address 'FILELISTER."||bbsline||"' 'SEARCHFILES'"
  17. interpret befehl
  18.  
  19. exit
  20.